CommonEvent 2844
Name = "誘惑：アグレイブ"

  999([2151])
  Script(["$game_troop.lose_event_id = 3844"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["agrave_fc1", 0, 0, 2])
  ShowText(["\\n<Agrave>"])
  ShowText(["The situation is unfavorable……"])
  ShowText(["Deploying capture units."])
  Script(["battler_graphic_hide"])
  ShowPicture([5, "ev_agrave_hd1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Luka's body was captured inside the capture unit!"])
  ShowText(["Restrained in a chair, unable to move!"])
  ShowTextAttributes(["agrave_fc1", 1, 0, 2])
  ShowText(["\\n<Agrave>"])
  ShowText(["As a special measure, I will use the pseudo-female organ unit."])
  ShowText(["Allow me to squeeze out your seed to the utmost pleasure."])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Struggle", "Submit"], 1])
  When([0, "もがく"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["However, Luka shook off the temptation and escaped from the restraints!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "なすがまま"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["agrave_fc1", 1, 0, 2])
  ShowText(["\\n<Agrave>"])
  ShowText(["It seems you won't resist."])
  ShowText(["Then, let's proceed with the pseudo-copulation for extraction..."])
  ShowPicture([5, "ev_agrave_he2", 0, 0, 0, 0, 100, 100, 255, 0])
  ControlVariables([26, 26, 3, 0, 12])
  PlaySE(["RPG::SE(@name=\"mon_ero_pyu3\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Agraive inserted the penis into the extraction unit at the groin!"])
  ShowText(["The soft flesh writhes and contracts, providing intense pleasurable stimulation! \\D"])
  ShowText(["Luka took damage from \\V[26]!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  Label(["射精1"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Hau... Ah, aaahhh!!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_agrave_he3", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The moment Luka was violated by Agraive, he unexpectedly reached climax."])
  ShowText(["Inside the pseudo-reproductive organ, the semen flows in with a thump――"])
  ShowTextAttributes(["agrave_fc1", 1, 0, 2])
  ShowText(["\\n<Agrave>"])
  ShowText(["Confirmation of ejaculation within the extraction unit..."])
  ShowText(["The time taken was 5 seconds."])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
